object FrmSelSalesmen: TFrmSelSalesmen
  Left = 0
  Top = 0
  BorderStyle = bsDialog
  Caption = #35831#36873#25321#38144#21806#21592
  ClientHeight = 443
  ClientWidth = 259
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnDestroy = FormDestroy
  OnShow = FormShow
  DesignSize = (
    259
    443)
  PixelsPerInch = 96
  TextHeight = 13
  object dbgdsalesmen: TDBGridEh
    Left = 8
    Top = 8
    Width = 245
    Height = 392
    Anchors = [akLeft, akTop, akRight, akBottom]
    DataGrouping.GroupLevels = <>
    DataSource = dsSalesmen
    Flat = False
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'Tahoma'
    FooterFont.Style = []
    IndicatorOptions = [gioShowRowIndicatorEh]
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
    OnDblClick = dbgdsalesmenDblClick
    OnKeyPress = dbgdsalesmenKeyPress
    Columns = <
      item
        Checkboxes = True
        EditButtons = <>
        FieldName = 'sel'
        Footers = <>
        Title.Caption = #36873#25321
        Width = 32
      end
      item
        EditButtons = <>
        FieldName = 'staffid'
        Footers = <>
        ReadOnly = True
        Title.Caption = #21592#24037#21495
        Width = 98
      end
      item
        EditButtons = <>
        FieldName = 'userName'
        Footers = <>
        ReadOnly = True
        Title.Caption = #38144#21806#21592#21517#31216
        Width = 120
      end>
    object RowDetailData: TRowDetailPanelControlEh
    end
  end
  object btnOK: TRzButton
    Left = 90
    Top = 410
    Anchors = [akRight, akBottom]
    Caption = 'OK'
    TabOrder = 1
    OnClick = btnOKClick
  end
  object btnCancel: TRzButton
    Left = 178
    Top = 410
    Anchors = [akRight, akBottom]
    Caption = 'Cancel'
    TabOrder = 2
    OnClick = btnCancelClick
  end
  object myqrySalesmen: TMyQuery
    Connection = DMMySQL.conMySQL
    SQL.Strings = (
      'select userName,staffid from sys_user where role&8 and active=1')
    Left = 120
    Top = 56
  end
  object dsSalesmen: TDataSource
    DataSet = cdsSelSalesmen
    Left = 168
    Top = 104
  end
  object dsPrdSelSalesment: TDataSetProvider
    DataSet = myqrySalesmen
    Left = 112
    Top = 120
  end
  object cdsSelSalesmen: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dsPrdSelSalesment'
    AfterOpen = cdsSelSalesmenAfterOpen
    Left = 120
    Top = 200
    object cdsSelSalesmenuserName: TWideStringField
      FieldName = 'userName'
      Origin = 'sys_user.userName'
    end
    object cdsSelSalesmenstaffid: TWideStringField
      FieldName = 'staffid'
      Origin = 'sys_user.staffid'
      Size = 10
    end
    object cdsSelSalesmensel: TBooleanField
      FieldKind = fkInternalCalc
      FieldName = 'sel'
    end
  end
end
